Initially I have 3 files that I want to analyze. I found the files here. I found the background image for this report here
head(oilcomp, 6)
## Country.Region Oil.consumption.bbl.day.
## 1 World 99558000
## 2 United States 20000000
## 3 European Union 15000000
## 4 China 13500000
## 5 India 4990000
## 6 Japan 3988000
head(oilprod, 6)
## # A tibble: 6 x 2
## Country `Oil Production(bbl/day)`
## <chr> <dbl>
## 1 USA 15043000
## 2 Saudi Arabia 12000000
## 3 Russia 10800000
## 4 Iraq 4451516
## 5 Iran 3990956
## 6 China 3980650
head(oilworld, 6)
## # A tibble: 6 x 2
## year consumption
## <dbl> <dbl>
## 1 1980 59522.
## 2 1981 57598.
## 3 1982 56401.
## 4 1983 55731.
## 5 1984 56890.
## 6 1985 57105.
colnames(oilcomp) <- c("Country", "Oil_Consumption")
colnames(oilprod) <- c("Country", "Oil_Production")
colnames(oilworld) <- c("Year", "Total_Oil_Consumption")
oilcomp5 <- oilcomp[2:6,]
oilprod <- oilprod[1:5,]
Please visit the development page of the prettydoc package for latest updates and news. Comments, bug reports and pull requests are always welcome.